home *** CD-ROM | disk | FTP | other *** search
/ Quick PC 61 / Quick PC 61.iso / I386 / SASETUP.MSI / F77567_sh_taskframes.asp < prev    next >
Encoding:
Text File  |  2003-02-21  |  1.5 KB  |  50 lines
  1. <%    '==================================================
  2.     ' Microsoft Server Appliance
  3.     '
  4.     ' Serves task wizard/propsheet frameset
  5.     '
  6.     ' Copyright (c) Microsoft Corporation.  All rights reserved.
  7.     '================================================== %>
  8. <!-- #include file="inc_framework.asp">
  9. <!-- include file="sh_page.asp" -->
  10. <html>
  11. <head>
  12. <meta http-equiv="Content-Type" content="text/html; charset=<%=GetCharSet()%>">
  13. <title>
  14. <%
  15. if SA_IsIE() Then
  16.     Response.Write(Server.HTMLEncode(Request.QueryString("Title")))
  17. Else
  18.     Response.Write(UTF8ToUnicode(Request.QueryString("Title")))
  19. End If
  20. %>
  21. </title>
  22. <!-- Copyright (c) Microsoft Corporation.  All rights reserved.-->
  23. </head>
  24. <%
  25.     Dim strURL
  26.     
  27.     strURL = Request.QueryString("URL")
  28.     if InStr(strURL, "?") = 0 then
  29.         '? not found in URL
  30.         strURL = strURL & "?" 
  31.     else
  32.         strURL = strURL & "&" 
  33.     end if
  34.  
  35.     strURL = strURL & "ReturnURL=" & Server.URLEncode(Request.QueryString("ReturnURL"))
  36.  
  37.     SA_StoreTableParameters()
  38.  
  39. %>
  40.   <frameset rows="*,75" framespacing=0 border="false" frameborder="0">
  41.     <frame name="main" scrolling="yes" src="<%=strURL%>" noresize marginwidth="0" marginheight="0">
  42.     <frame name="footer" scrolling="auto" src="<%=m_VirtualRoot%>sh_defaultfooter.asp" noresize frameborder=0 marginwidth="0" marginheight="0">
  43.   <noframes>
  44.   <BODY>
  45.     <p ID=PID_01>This page uses frames, but your browser doesn't support them.</p>
  46.   </BODY>
  47.   </noframes>
  48. </frameset>
  49. </html>
  50.